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Objectives 


•  Nested  Blocks 


Variable  Scope  and  VisibilitjT^^^^^^ 

•  Identifier  Scope  a  p  ^ch^^^V^-^^^^ 
Write  a  successful  SELECT  statement  in 

Declare  the  data  type  and  size  of  a  PL/ SQL 
variable  dynamically  ^^^t^C^ 

Write  DML  statements  in  PL/ SQL 

Control  transactions  in  PL/ SQL 

Determine  the  outcome  of  SQL  DML 
statements 
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Nested  Blocks  and  Variable  Scope 


Statements  can  be  nested  wherever  an 
executable  statement  is  allowecC^^^ 


•  A  nested  block  becomes  a  statement. 


An  exception  section  can  contain  nested 

blocks. 

4 


The  scope  of  an  object  is  the  region  of  the 
program  that  can  refer  to  the  object. 
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Nested  Blocks  and  Variable  Scope 


An  identifier  is  visible  in  the  regions  in 
which  you  can  reference  the  unqualified 
identifier:        i€z±  r^rbc  ^^^^^ 


-  A  block  can  look  up  to  the  enclosing 


A  block  cannot  look  down  to  enclosed 
blocks.        /  \ 


Copyright  ©  CD  AC- ACTS 


Advanced  Computing  Training  School  (ACTS) 
Advanced  Computing  for  Human  Advancement 


ftp  A)>*prrr 
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Nested  Blocks  and  Variable  Scope 


Example 


x  BINARY_INTEGER; 
BEGIN 


DECLARE 

y  NUMBER ; 
BEGIN   


Scope  ofx 


Scope  ofy 


END; 


END; 


/  
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Identifier  Scope 
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An  identifier  is  visible  in  the  regions  where 
you  can  reference  the  identifier  without 
having  to  qualify  it^^cFP^v^^^^^ve:^^ 

A  block  can  look  up  to  the  enclosing  block. 

A  block  cannot  look  down  to  enclosed 
blocks  yffl 


Copyright  ©  CD  AC- ACTS 


Advanced  Computing  Training  School  (ACTS) 
Advanced  Computing  for  Human  Advancement 


cbnc  iSSkQCts 


Qualify  an  Identifier 


The  qualifier  can  be  the  label  of  an 
enclosing  block. 


Qualify  an  identifier  by  using  the  block 
l^bg&Djef^^ 
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one  iSkQCts 


Qualify  an  Identifier 


«outer» 
DECLARE 

birthdate  DATE; 


BEGIN 


DECLARE 

birthdate  DATE; 
BEGIN 

m  m  m 

outer.birthdate  := 

TO_DATE('03-A  UG-1976',  'DD-MON-  YYYY'); 
END; 


END; 
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Determining  Variable  Scope 


«outer» 
DECLARE 

v_sal  NUMBER(7,2)  :=  60000; 
vjcomm  NUMBER(7,2)  :=  v_sal  *  0.20; 
v_message  VARCHAR2(255)  :=  'eligible  for  commission'; 
BEGIN 

DECLARE 

v_sal  NUMBER(7,2)  :=  50000; 
vjcomm  NUMBER(7,2)  :=  0; 
v_total_comp  NUMBER(7,2)  :=  v_sal  +  vjcomm; 
BEGIN 

v_message  :=  'CLERK  not"\\v_message; 
outer.vjcomm  :=  vjsal  *  0.30; 
 > 


END; 

v_message  :=  'SALESMAN'\\v_message; 
 > 


END; 
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Determining  Variable  Scope 


Lets  evaluate  the  PL/ SQL  block  on  the  previous 
slide.  Determine  each  of  the  following  values 
according  to  the  rules  of  scoping: 


1.  The  value  of  V_MESSAGE  in  the  sub-block. 

2.  The  value  of  V_TOTAL_COMP  in  the  main  block. 

3.  The  value  of  V_COMM  in  the  sub-block. 

4.  The  value  of  V_COMM  in  the  main  block. 

5.  The  value  of  V  MESSAGE  in  the  main  block. 
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SELECT  Statements  in  PL/SQL 


•  Retrieve  data  from  the  database  with 
Syntax  Mr  ^cr9^Ci^  \ 


SELECT  select_llst 
INTO    { varlable_name  [ , 

|  record_iiaine} 
FROM  table 
WHERE  condl tl on ; 


variable  name] 
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SELECT  Statements  in  PL/SQL 


•  The  INTO  clause  is  required. 


DECLARE 

v_deptno  NUMBER(4); 

v_location_id  NUMBER(4); 
BEGIN 

SELECT  department_id,  location_id 
INTO  v_deptno,  v_location_id 
FROM  departments 
WHERE  department_name  =  'Sales'; 


END; 
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Retrieving  Data  in  PL/SQL 


Retrieve  the  hire  date  and  the  salary 
for  the  specified  employee,  ^<f^^^^ 

Example  ^^J^^C^l^-"  - 


DECLARE 

v_hire_date  employees. hire_date%TYPE; 
vjsalary  employees.salary%TYPE; 
BEGIN 

SELECT  hirejdate,  salary 
INTO  v_hire_date,  vjsalary 
FROM  employees 
WHERE  employeejd  =  100; 

m  m  m 

END; 

I 


Advanced  Computing  Training  School  (ACTS) 
Advanced  Computing  for  Human  Advancement 


ftp  A)>*prrr 
ifSkQCtS 


Retrieving  Data  in  PL/SQL 


Return  the  sum  of  the  salaries  for  all 
employees  in  the  specified  department. 


DECLARE 

v_sum_sal  NUMBER(10,2); 

v_deptno  NUMBER  NOT  NULL  :=  60; 
BEGIN 

SELECT  SUM(salary)  -  group  function 
INTO  v_sum_sal 
FROM  employees 

WHERE  department_id  =  v_deptno; 
DBMS_OUTPUT.PUT_LINE  (The  sum  salary  is  ' 
TO_CHAR(v_sum_sal)); 
END; 

/ 
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Inserting  Data 


•  Add  new  employee  information  to  the 
EMP  table.  Zr^^^T^^^^^S^S 

Example    J  A/^^S 


BEGIN 

INSERT  INTO  employees 

(employee_id,  first_name,  last_name,  email, 

hire_date,  job_id,  salary) 

VALUES 

(employees_seq.NEXTVAL,  "Ruth1,  'Cores',  'RCORES', 
sysdate,  'AD.ASST*,  4000); 
END; 

/ 
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Updating  Data 
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Increase  the  salary  of  all  employees  in 
the  EMP  table  who  are  Analysts. 
Example  /       ▲  y  3?cR^^^v:^^^^^^ 


/  \ 


DECLARE 

v_sal_increase  employees.salary%TYPE  :=  800; 
BEGIN 

UPDATE  employees 

SET  salary  =  salary  +  v_sal_increase 

WHERE  job_id  =  'ST_CLERK'; 


END; 
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Deleting  Data 


ifikcicts 


•  Delete  rows  that  belong  to  department  10  from 
the  EMP  table.  5  \ 

•  Example 


DECLARE 

v_deptno  employees. department_id%TYPE  : 
BEGIN 

DELETE  FROM  employees 
WHERE  department_id  =  v_deptno; 
Commit; 
END; 


=  10; 
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Naming  Conventions 


Use  a  naming  convention  to  avoid 
ambiguity  in  the  WHERE  clause. 

Database  columns  and  identifiers 
should  have  distinct  names. 

Syntax  errors  can  arise  because 
PL/ SQL  checks  the  database  first  for 
a  column  in  the  table. 


1^ 
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Naming  Conventions 

DECLARE 

hire_date  employees. hire_date%TYPE; 
sysdate  hire_date%TYPE; 

employee_id  employees.employee_id%TYPE  :=  176; 
BEGIN 

SELECT  hire_date,  sysdate 
INTO  hire_date,  sysdate 
FROM  employees 

WHERE  employ ee_id  =  employ ee_id; 
END; 

ERROR  at  line  1: 

ORA-01422:  exact  fetch  returns  more  than 
requested  number  of  rows 

ORA-06512:  at  line  6 
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COMMIT  and  ROLLBACK  Statements 


Use  COMMIT  and  ROLLBACK  SQL 
statements  to  terminate  a 
transaction  explicitly.  S^^\ 
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SQL  Cursor 
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A  cursor  is  a  private  SQL  work  area. 
There  are  two  types  of  cursors:  s^^^^^^ 

Implicit  cursdbs  31  ctnc^i ^ 

The  Oracle  Server  uses  implicit  cursors  to 
parse  and  execute  your  SQL  statements. 

Explicit  cursors  are  explicitly  declared  by 
the  programmer. 
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SQL  Cursor  Attributes 
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Using  SQL  cursor  attributes,  you  can 
test  the  outcome  of  your  SQL  ^^T^^ 


SQL%ROWCOUNT 

Number  of  rows  affected  by  the 
most  recent  SQL  statement  (an 
integer  value) 

SQL%FOUND 

Boolean  attribute  that  evaluates  to 
TRUE  if  the  most  recent  SQL 
statement  affects  one  or  more  rows 

SQL%NOTFOUND 

Boolean  attribute  that  evaluates  to 
TRUE  if  the  most  recent  SQL 
statement  does  not  affect  any  rows 

SQL%ISOPEN 

Always  evaluates  to  FALSE  because 
PL/SQL  closes  implicit  cursors 
immediately  after  they  are  executed 
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SQL  Cursor  Attributes 


Delete  rows  that  have  the  specified  employee 
ID  from  the  copy_emp  table.  Print  the 
number  of  rows  deleted. 


•  Example 


DECLARE 

v_employee_id  copy_emp.employee_id%TYPE  ;=  176; 
BEGIN 

DELETE  FROM  copy_emp 

WHERE  employeejd  =  v_employee_id; 

DBMS_OUTPUT.PUT_LINE  (SQL%ROWCOUNT  \\' row 

deleted. '); 
END; 
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Summary 


PL/ SQL  block  structure:  Nesting  blocks  and 
scoping  rules?^^^  "^^"^^c^^^^X^Z^ 
Use  SQL  in  the  PL/ SQL  block: 

SELECT,  INSERT,  UPDATE,  DELETE 

COMMIT,  ROLLBACK,  SAVEPOINT 
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Summary 
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There  are  two  cursor  types:  implicit  and 

Implicit  cursor  attributes  verify  the 
outcome  of  DML  statements: 

SQL%ROWCOUNT 

SQL%FOUND 

SQL%NOTFOUND  " 

SQL%ISOPEN  \ 

Explicit  cursors  are  defined  by  the 
programmer. 
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Thank  You  ! 
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